home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / misc / excalc1.lha / ExCalcV1.1 / Source / InOutExt.mod < prev    next >
Text File  |  1995-05-08  |  940b  |  31 lines
  1. (*********************************************************************)
  2. (*                                                                   *)
  3. (* Module InOutExt Copyright © 1995 by Computer Inspirations         *)
  4. (*                                                                   *)
  5. (* Design : Michael Griebling                                        *)
  6. (* Change : Original                                                 *)
  7. (*                                                                   *)
  8. (*********************************************************************)
  9.  
  10. MODULE InOutExt;
  11.  
  12. IMPORT io;
  13.  
  14.  
  15. (* +++++++++++++++++++++++++++++++++++++ *)
  16. PROCEDURE WriteLine * (OutBuff : ARRAY OF CHAR);
  17. (* $CopyArrays- *)
  18. BEGIN
  19.   io.WriteString(OutBuff); io.WriteLn;
  20. END WriteLine;
  21.  
  22.  
  23. (* +++++++++++++++++++++++++++++++++++++ *)
  24. PROCEDURE ReadLine * (VAR OutBuff : ARRAY OF CHAR);
  25. BEGIN
  26.   io.ReadString(OutBuff);
  27. END ReadLine;
  28.  
  29.  
  30. END InOutExt.
  31.